╟o≡unuz Windows 95Æin kay²t bilgileri (Registry) hakk²nda az τok bir ■eyler biliyorsunuzdur.
Registry programlar²n kendisi hakk²ndaki bilgileri saklad²≡² uygun bir aland²r.
Windows 3.1Æde program bilgileri INI dosyalar²nda saklan²rd². Windows 95Æde de 16 bitlik programlar halen INI dosyalar²n² kullanmalar²na ra≡men 32 Bitlik programlar art²k registryÆyi kullan²yor. E≡er 32 BitÆlik programlar haz²rl²yorsan²z siz de mutlaka registry bilgilerinin nas²l dⁿzenlendi≡ini bilmelisiniz.
Visual Basic registryÆye bilgi yazmak iτin kendi iτerisinde bulunan bir API fonksiyonunu kullan²r. Bu fonksiyon bir komut de≡ildir fakat VB bu fonksiyonu tan²mak iτin d²■ar²dan bir DLL kullanmamaktad²r.
SaveSetting, GetSetting, DeleteSetting komutlar²n²n genel kullan²m² ■÷yledir:
[KOMUT] "[PROGRAM ADI]", "[ANAHTAR]", "[╓ZELL▌K]", "[DE╨ER]
komutlar²n yerine getirece≡i i■lev de≡i■tikτe yukar²daki sat²r²n baz² parametreleri kullan²lmayabilir.
▌■te size registryÆye bilgi yazan, okuyan ve silen bir programc²k, yapt²≡² ise basit: pencere bⁿyⁿklⁿ≡ⁿnⁿ ve pencerenin ekrandaki yerini registryÆye yaz²p siz istedi≡inizde g÷rⁿntⁿlⁿyor.
Private Sub Command1_Click() 'Ayarlar² kaydet SaveSetting "Deneme", "Ayarlar", "Top", Form1.Top SaveSetting "Deneme", "Ayarlar", "Left", Form1.Left SaveSetting "Deneme", "Ayarlar", "Width", Form1.Width SaveSetting "Deneme", "Ayarlar", "Height", Form1.Height End Sub Private Sub Command2_Click() GetSetting "Deneme", "Ayarlar", "Left" GetSetting "Deneme", "Ayarlar", "Top" GetSetting "Deneme", "Ayarlar", "Width" GetSetting "Deneme", "Ayarlar", "Height" mesaj$ = "Sol: " & Left & Chr$(13) & "▄st: " & Top & Chr$(13) & "Uzunluk: " & Width & Chr$(13) & "Yⁿkseklik: " & Height MsgBox mesaj$, 64, "Mevcut Registry Ayarlar²" End Sub Private Sub Command4_Click() 'Olu■turdu≡umuz registry ayarlar²n² silmek... 'Deneme isimli program²n tⁿm ayarlar²n² silmek iτin DeleteSetting "Deneme" 'Sadece "Ayarlar" anahtar²n² silmek iτin 'DeleteSetting "Deneme", "Ayarlar" 'Kullanabilirsiniz... End Sub